Interactius per a markdown

https://rstudio.github.io/dygraphs/gallery-custom-plotters.html

Paquet plotly amb gpplot2

# install.packages("plotly") # if you haven't installed the package
library(plotly)

p <- ggplot(data = mpg, aes(x = displ, y = cty)) +
  geom_point()

ggplotly(p)

Aplicació online de plotly

https://plot.ly/create/?fid=ouzor:33#/

Paquet giraph amb ggplot2

# install.packages("ggiraph")
# install.packages("ggplot2")

require("ggiraph")
require("ggplot2")

data("mpg")
g <- ggplot(mpg, aes( x = displ, y = cty, color = hwy) )
my_gg <- g + geom_point_interactive(aes(tooltip = model), size = 2)
ggiraph(code = print(my_gg) )

Paquet dygraphs

# install.packages("dygraphs", dependencies = T)
require("dygraphs")

lungDeaths <- cbind(ldeaths, mdeaths, fdeaths)
dygraph(lungDeaths, main = "Deaths from Lung Disease (UK)") %>%
  dyHighlight(highlightCircleSize = 5, 
              highlightSeriesBackgroundAlpha = 0.2,
              hideOnMouseOut = FALSE)

Interactius “nova finestra”

Paquet iplot

http://rosuda.org/software/iPlots/

install.packages("iplots",dep=TRUE)
require(iplots)
ihist(iris$Sepal.Length)